home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 30 / Amiga Format AFCD30 (Sep 1998, Issue 114).iso / -screenplay- / hd_installers / supercars / install-supercars < prev    next >
Text File  |  1998-06-18  |  2KB  |  88 lines
  1. ; Installer generated by installjst v1.0, a script by JF Fabre
  2. ; 
  3. ; Command line: installjst Supercars supercars supercars Supercars disk2filehd Supercars
  4. ; 
  5. (set GameDir "Supercars")
  6.  
  7. ;try to figure out a place where the user usually installs his games
  8. (if (exists "Games:" (noreq) )
  9.     (set @default-dest "Games:")
  10.     (if (exists "SYS:Games" (noreq) )
  11.         (set @default-dest "SYS:Games")
  12.         (if (exists "Work:Games" (noreq) )
  13.             (set @default-dest "Work:Games")
  14.             (if (exists "JEUX:" (noreq) )
  15.                (set @default-dest "JEUX:")
  16.                (set @default-dest "SYS:")
  17.             )
  18.         )
  19.     )
  20. )
  21. (set #dest
  22.      (tackon (askdir (prompt "Where would you like " @app-name " installed?\n"
  23.                              "A drawer called " GameDir " will be created.")
  24.                      (help @askdir-help)
  25.                      (default @default-dest)
  26.                      (newpath)
  27.              )
  28.      GameDir
  29.      )
  30. )
  31.  
  32. (set @default-dest #dest)
  33.  
  34. (message "\n\n\nThis loader needs the JST program (NOT INCLUDED)\n to be copied in your path\n\n(if you don't have it already)\n\nJST is available from aminet (game/patch) or on my site\n\nhttp://www.ensica.fr/~jffabre/patches.html")
  35.  
  36. (set #CI_unit
  37.     (askchoice
  38.         (prompt "From which disk unit do you want\nto install the game")
  39.         (help    @askoptions-help)
  40.         (choices
  41.            "DF0:"
  42.            "DF1:"
  43.            "DF2:"
  44.            "DF3:"
  45.         )
  46.     )
  47. )
  48.  
  49. (set #CI_drive ("DF%ld:" #CI_unit))
  50.  
  51.  
  52. (makedir @default-dest
  53.     (help @makedir-help)
  54.     (infos)
  55. )
  56.  
  57. ;----------------------------
  58.  
  59. (copyfiles
  60.     (help @copyfiles-help)
  61.     (source "SupercarsHD")
  62.     (dest @default-dest)
  63.     (infos)
  64. )
  65.  
  66. (copyfiles
  67.     (help @copyfiles-help)
  68.     (source "supercarshd.readme")
  69.     (dest @default-dest)
  70.     (infos)
  71. )
  72.  
  73.  
  74. (message ("\nInsert %s disk 1 into drive %s !" @app-name #CI_drive))
  75.     (if
  76.         (= 0 (run ("grem2file %ld %s 2 157 >con:10/10/400/200//CLOSE/WAIT" #CI_unit (tackon @default-dest "supercars.d1") )))
  77.         ("")
  78.         (abort "\"grem2file\" must be in your PATH !")
  79.     )
  80.  
  81. (message ("\nInsert %s disk 2 into drive %s !" @app-name #CI_drive))
  82.     (if
  83.         (= 0 (run ("grem2file %ld %s 0 159 >con:10/10/400/200//CLOSE/WAIT" #CI_unit (tackon @default-dest "supercars.d2") )))
  84.         ("")
  85.         (abort "\"grem2file\" must be in your PATH !")
  86.     )
  87.  
  88.